Practice Final Exam 


CSCI-400: Principles of Programming Languages (all sections) 


Instructor: Dr. Neil T. Dantam 


Spring 2024 


SOLUTIONS 


Duration: 120 minutes 


Instructions: 
1. Please silence or turn off any phones, tablets, or electronic devices. 
2. Write your name on EVERY page, BOTH SIDES. 
3. This exam is closed book. 
4. You may use one letter-sized sheet of notes, both-sides. 
5. Answers must be NEAT and LEGIBLE. Credit cannot be given for illegible answers. 
6. Exams will be scanned: 


(a) Write only within the marked borders. 
(b) Do not staple or dog-ear pages. 
7. For questions asking for proofs: 
(a) Proofs must be precise and mathematically justified. 


(b) Good proofs are concise. Include sufficient detail, but do not include irrelevant information. 


(c) Please do not transcribe algorithms or proofs covered in lecture onto the exam. You may just reference 
these results as lemmas or subroutines for full credit (if used appropriately). 


8. For questions asking for code or pseudocode: you may use OCaml syntax or pseudocode of the style used in 
lecture. 
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SOLUTIONS 


1. Consider a language based on the lambda calculus that includes function definition, function application, 
numbers, and arithmetic operations (addition, subtraction, multiplication, division): 


(a) Write a context-free grammar for this language. 


(e) —> “number” | “var” 
J "A" "var? “"" (e) 

|  ¢e)<e) 

| (e) (b) (e) 

i y 

D a A 


(b) Write a variant for the abstract syntax of this language. 
type bop — 

Add 

Sub 

Mul 

Div 

type expr + 

Num of number 

Var of string 

FuncExpr of string x expr 

CallExpr of expr x expr 

BopExpr of expr x bop x expr 
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SOLUTIONS 


(c) Formally define the big step semantics of this language. 
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(d) Write an evaluator for this language based on your big step semantics. 
defun eval E t > 

match ¢ with 

case Num(n) =n 

case Var(x) = E(x) 

case FuncExpr(v, t) + (FuncExpr(v, t), E) 

case BopExpr(x, b, y) > 

let 

x + eval Ex 

y+ eval E y 


match b with 
case Add > x+y 
case Sub > xy 
case Mul + x*y 
case Div + x/y 


case CallExpr( f, a) = 

match (eval E f, eval E a) with 

case ((FuncExpr(z, t), E), v) > 
| eval Ejz => v] t 

otherwise ERROR 
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SOLUTIONS 


2. Using your language syntax from Question 1: 


(a) Write an expression containing at least two function definitions and two function applications. 
(b) Evaluate this expression using dynamic scope. 


(c) Evaluate this expression using lexical scope. 


Varies 
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SOLUTIONS 


3. Using your language from Question 1: 


(a) Write an expression containing at least one function definition, one function application, and one arithmetic 


operation. Then, use the basic constraint-generation/solving approach discussed in class to infer the type 
of your expression. 


(b) What are the preliminary types? 
(c) What are the constraints? 
(d) What is the solution to the constraints obtained from unification? 


Varies 
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SOLUTIONS 


4. For the following data type and functions, use structural induction to prove that for any list with at least one 
element, listor(¢) must be true whenever listand(f) is true. 


Function listand(¢) Function listor(¢) 
pe boollist — match £ with match £ with 
| Nil case nil => true case nil > false 
| | Cons of B x boollist case cons false £ > false case cons true l —> true 
case cons true l > case cons false £ > 
| listand(¢) | listor(é) 


Proof. We prove by induction that listand(¢) =  listor(@) for |4| > 1. 


e Basis: listor(|true]) = listand([true]) = true 
e Induction: 


— Assume that for list /, listor(¢) = listand(/) = true 
There are two cases to consider: ¢’ = cons (false, ¢) and ¢” = cons (true, £) 


listand(¢’) = false, so the property (implication) offers no information about the value of listor(¢’). 
That is, (1istand((’) = Listor(¢’) } ~~ [false => Listor(’) } ~ true 


listand((”) = listor(¢”) = true. 
Inductively, the property must hold. 
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